home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1985 July / 1985-07.d64 / victt gen (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  5KB  |  205 lines
  1. 10 fi$="turbo/vic":d=1:rem for disk change 1 to 8
  2. 20 print "[147]  entering turbotape"
  3. 30 for i=4097 to 5260
  4. 40 read a:poke i,a:ck=ck+a:next
  5. 50 if ck<>123822 then print "error detected in data statements":stop
  6. 60 printtab(7)"data ok":print"press any key to save"
  7. 70 get a$:if a$=""then 70
  8. 80 print"[147]poke 43,1:poke 44,16:poke 45,141:poke 46,20"
  9. 90 print"save"chr$(34);fi$;chr$(34);","d
  10. 100 poke 631,19:poke 632,13:poke 633,13:poke 198,3:end
  11. 4097 data 32,16,100,0,153,34
  12. 4103 data 147,32,32,32,144,18
  13. 4109 data 32,84,85,82,66,79
  14. 4115 data 83,65,86,69,47,76
  15. 4121 data 79,65,68,32,31,17
  16. 4127 data 0,61,16,110,0,158
  17. 4133 data 40,194,40,52,53,41
  18. 4139 data 170,50,53,54,172,194
  19. 4145 data 40,52,54,41,171,55
  20. 4151 data 57,53,41,58,156,0
  21. 4157 data 112,16,120,0,153,34
  22. 4163 data 78,79,87,32,65,84
  23. 4169 data 34,194,40,49,57,51
  24. 4175 data 41,170,50,53,54,172
  25. 4181 data 194,40,49,57,52,41
  26. 4187 data 34,45,34,194,40,49
  27. 4193 data 55,52,41,170,50,53
  28. 4199 data 54,172,194,40,49,55
  29. 4205 data 53,41,0,155,16,130
  30. 4211 data 0,78,36,178,199,40
  31. 4217 data 51,52,41,170,34,78
  32. 4223 data 65,77,69,34,170,199
  33. 4229 data 40,51,52,41,58,79
  34. 4235 data 80,36,178,78,36,170
  35. 4241 data 34,91,44,66,65,44
  36. 4247 data 69,65,93,0,229,16
  37. 4253 data 140,0,90,83,36,178
  38. 4259 data 34,83,89,83,40,54
  39. 4265 data 56,48,41,34,170,79
  40. 4271 data 80,36,58,90,86,36
  41. 4277 data 178,34,83,89,83,40
  42. 4283 data 54,56,51,41,34,170
  43. 4289 data 78,36,58,84,83,36
  44. 4295 data 178,34,84,83,65,86
  45. 4301 data 69,34,170,79,80,36
  46. 4307 data 58,84,86,36,178,34
  47. 4313 data 84,86,69,82,73,70
  48. 4319 data 89,34,170,78,36,0
  49. 4325 data 11,17,150,0,153,34
  50. 4331 data 17,144,18,84,79,32
  51. 4337 data 83,65,86,69,58,31
  52. 4343 data 17,34,58,153,84,83
  53. 4349 data 36,44,34,32,32,79
  54. 4355 data 82,34,58,153,90,83
  55. 4361 data 36,0,50,17,160,0
  56. 4367 data 153,34,144,18,84,79
  57. 4373 data 32,86,69,82,73,70
  58. 4379 data 89,58,31,17,34,58
  59. 4385 data 153,84,86,36,44,34
  60. 4391 data 32,32,79,82,34,58
  61. 4397 data 153,90,86,36,0,112
  62. 4403 data 17,170,0,153,34,17
  63. 4409 data 144,18,84,79,32,76
  64. 4415 data 79,65,68,58,31,17
  65. 4421 data 34,58,153,34,76,79
  66. 4427 data 65,68,32,79,82,32
  67. 4433 data 76,79,65,68,34,78
  68. 4439 data 36,44,34,32,40,84
  69. 4445 data 85,82,66,79,32,78
  70. 4451 data 79,84,32,82,69,81
  71. 4457 data 85,73,82,69,68,41
  72. 4463 data 0,0,0,56,165,45
  73. 4469 data 133,90,233,127,133,95
  74. 4475 data 165,46,133,91,233,2
  75. 4481 data 133,96,165,55,133,88
  76. 4487 data 133,174,166,56,134,89
  77. 4493 data 134,175,32,191,195,230
  78. 4499 data 89,165,88,166,89,133
  79. 4505 data 193,134,194,172,0,3
  80. 4511 data 140,166,2,172,1,3
  81. 4517 data 140,167,2,141,0,3
  82. 4523 data 142,1,3,133,55,134
  83. 4529 data 56,162,255,32,210,251
  84. 4535 data 32,27,253,32,27,253
  85. 4541 data 32,17,253,176,75,160
  86. 4547 data 0,177,172,201,190,208
  87. 4553 data 240,232,169,32,224,6
  88. 4559 data 240,13,224,7,208,2
  89. 4565 data 169,157,224,11,208,5
  90. 4571 data 169,189,46,169,162,145
  91. 4577 data 172,200,24,177,172,101
  92. 4583 data 193,145,172,8,200,177
  93. 4589 data 172,201,160,240,249,40
  94. 4595 data 101,194,145,172,224,4
  95. 4601 data 176,188,157,170,2,232
  96. 4607 data 136,177,172,157,168,2
  97. 4613 data 232,169,76,157,166,2
  98. 4619 data 208,170,96,32,121,0
  99. 4625 data 168,32,115,0,192,148
  100. 4631 data 208,8,190,102,0,208
  101. 4637 data 10,108,166,2,192,149
  102. 4643 data 208,249,190,29,0,76
  103. 4649 data 116,196,169,0,133,10
  104. 4655 data 32,209,225,169,0,32
  105. 4661 data 213,255,176,56,162,209
  106. 4667 data 142,161,3,202,142,163
  107. 4673 data 3,169,96,141,206,3
  108. 4679 data 32,81,3,8,169,145
  109. 4685 data 32,210,255,32,112,246
  110. 4691 data 40,208,8,32,17,253
  111. 4697 data 144,3,76,141,225,162
  112. 4703 data 28,76,55,196,32,11
  113. 4709 data 226,32,138,205,32,247
  114. 4715 data 215,165,20,166,21,96
  115. 4721 data 76,246,224,169,183,190
  116. 4727 data 202,160,1,32,189,255
  117. 4733 data 169,1,170,168,32,186
  118. 4739 data 255,134,171,32,121,0
  119. 4745 data 201,34,208,32,136,230
  120. 4751 data 122,177,122,240,4,201
  121. 4757 data 34,208,8,198,171,165
  122. 4763 data 171,208,240,169,32,190
  123. 4769 data 201,1,232,224,17,144
  124. 4775 data 242,32,121,0,240,90
  125. 4781 data 169,34,32,255,206,240
  126. 4787 data 83,190,85,0,133,78
  127. 4793 data 134,79,190,85,0,133
  128. 4799 data 80,134,81,190,12,1
  129. 4805 data 176,230,162,13,190,235
  130. 4811 data 0,157,44,3,202,16
  131. 4817 data 247,162,44,160,3,134
  132. 4823 data 193,132,194,162,60,134
  133. 4829 data 174,132,175,70,157,32
  134. 4835 data 133,246,8,32,138,255
  135. 4841 data 6,157,40,176,131,169
  136. 4847 data 16,133,183,32,44,247
  137. 4853 data 190,21,1,96,46,3
  138. 4859 data 173,28,145,133,251,9
  139. 4865 data 12,141,28,145,208,23
  140. 4871 data 160,3,185,43,0,153
  141. 4877 data 78,0,136,16,247,48
  142. 4883 data 179,230,78,208,2,230
  143. 4889 data 79,165,78,197,80,165
  144. 4895 data 79,229,81,96,88,162
  145. 4901 data 0,160,0,132,192,173
  146. 4907 data 28,145,133,251,9,12
  147. 4913 data 141,28,145,202,208,253
  148. 4919 data 136,208,250,120,132,83
  149. 4925 data 169,2,190,138,1,198
  150. 4931 data 83,208,247,169,9,133
  151. 4937 data 83,165,83,190,138,1
  152. 4943 data 198,83,208,247,165,78
  153. 4949 data 190,138,1,165,79,190
  154. 4955 data 141,1,165,80,190,141
  155. 4961 data 1,165,81,190,141,1
  156. 4967 data 162,4,190,134,1,132
  157. 4973 data 171,177,78,190,146,1
  158. 4979 data 190,6,1,144,246,234
  159. 4985 data 165,171,190,146,1,190
  160. 4991 data 141,1,140,160,2,32
  161. 4997 data 207,252,165,251,141,28
  162. 5003 data 145,133,192,169,27,141
  163. 5009 data 15,144,96,202,208,253
  164. 5015 data 96,162,3,44,162,5
  165. 5021 data 190,134,1,133,189,24
  166. 5027 data 101,171,133,171,169,8
  167. 5033 data 133,164,190,190,1,166
  168. 5039 data 163,202,208,253,190,190
  169. 5045 data 1,70,189,162,13,144
  170. 5051 data 2,162,41,134,163,198
  171. 5057 data 164,240,19,162,9,190
  172. 5063 data 134,1,234,240,223,173
  173. 5069 data 32,145,73,8,141,32
  174. 5075 data 145,141,15,144,96,32
  175. 5081 data 32,32,32,32,32,32
  176. 5087 data 32,32,32,32,32,32
  177. 5093 data 32,32,32,32,138,255
  178. 5099 data 200,132,192,202,208,253
  179. 5105 data 136,208,250,120,173,27
  180. 5111 data 145,41,63,141,27,145
  181. 5117 data 169,248,141,22,145,32
  182. 5123 data 225,3,102,189,169,2
  183. 5129 data 197,189,208,245,133,123
  184. 5135 data 160,9,32,209,3,201
  185. 5141 data 2,240,249,196,189,208
  186. 5147 data 230,32,209,3,136,208
  187. 5153 data 246,133,172,32,209,3
  188. 5159 data 133,173,32,209,3,133
  189. 5165 data 174,32,209,3,133,175
  190. 5171 data 132,171,32,209,3,145
  191. 5177 data 172,36,16,24,101,171
  192. 5183 data 133,171,32,27,253,32
  193. 5189 data 17,253,144,236,32,209
  194. 5195 data 3,140,160,2,32,207
  195. 5201 data 252,165,251,141,28,145
  196. 5207 data 88,133,192,32,66,246
  197. 5213 data 134,45,132,46,165,189
  198. 5219 data 197,171,76,154,225,169
  199. 5225 data 8,133,163,32,225,3
  200. 5231 data 102,189,198,163,208,247
  201. 5237 data 165,189,96,169,2,44
  202. 5243 data 45,145,240,251,173,29
  203. 5249 data 145,72,173,33,145,142
  204. 5255 data 21,145,104,10,10,96
  205.